home *** CD-ROM | disk | FTP | other *** search
/ Digital Pose Collection / Digital Pose Collection.iso / mac / POSE / DATA / MAIN.DXR / 00036.ls < prev    next >
Encoding:
Text File  |  1996-06-18  |  455 b   |  19 lines
  1. on exitFrame
  2.   global gfilename, gbookname, gface, gfacecastnum
  3.   put gfilename into field "QTName"
  4.   sound stop 2
  5.   set the fileName of cast gfacecastnum to "F" & gfilename & ".PCT"
  6.   if gbookname = "BASIC" then
  7.     puppetSound("BGM-1_11025")
  8.   else
  9.     if gbookname = "DAILY" then
  10.       puppetSound("BGM-3_11025")
  11.     else
  12.       if gbookname = "MOVING" then
  13.         puppetSound("BGM-2_11025")
  14.       end if
  15.     end if
  16.   end if
  17.   miniqtslider(88, 64)
  18. end
  19.